object Ftpudlg: TFtpudlg
  Left = 200
  Top = 96
  BorderIcons = []
  BorderStyle = bsDialog
  ClientHeight = 69
  ClientWidth = 192
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnShow = FormShow
  TextHeight = 16
  object Status: TLabel
    Left = 0
    Top = 0
    Width = 192
    Height = 17
    Alignment = taCenter
    AutoSize = False
  end
  object PaintBox1: TPaintBox
    Left = 20
    Top = 22
    Width = 155
    Height = 15
    Color = clWhite
    ParentColor = False
    OnPaint = PaintBox1Paint
  end
  object counter: TLabel
    Left = 6
    Top = 48
    Width = 44
    Height = 16
    Alignment = taCenter
    AutoSize = False
  end
  object cancel: TButton
    Left = 130
    Top = 42
    Width = 57
    Height = 23
    Caption = 'Cancel'
    TabOrder = 0
    OnClick = cancelClick
  end
  object Ftp1: TFtp
    FtpPort = 21
    TransferMode = BinaryTransfer
    OnFtpInfo = Ftp1FtpInfo
    OnFtpNeedInfo = Ftp1FtpNeedInfo
    OnFtpError = Ftp1FtpError
    BytesTransferred = 0
    TransferTime = 0
    Status = ftpAvailable
    Connected = False
    WinsockStarted = False
    Version = 'TFtp 1.2 SW Beta 3'
    Success = False
    Left = 4
    Top = 14
  end
  object Timer: TTimer
    OnTimer = TimerTimer
    Left = 146
    Top = 8
  end
end